(life-grim-reaper): store-match-data => set-match-data.

diff --git a/lisp/play/life.el b/lisp/play/life.el
index 304879684cbc8e77cba92f3be6f8f9369d55e31b..5764224d1d1d6828ccaa428100246c121699e234 100644 (file)
--- a/lisp/play/life.el
+++ b/lisp/play/life.el
@@ -188,7 +188,7 @@ generations (this defaults to 1)."
 (defun life-grim-reaper ()
   ;; Clear the match information.  Later we check to see if it
   ;; is still clear, if so then all the cells have died.
-  (store-match-data nil)
+  (set-match-data nil)
   (goto-char (point-min))
   ;; For speed declare all local variable outside the loop.
   (let (point char pivot living-neighbors list)